TextBox1.AppendText("OS : " & My.Computer.Info.OSFullName & vbNewLine & _
"Version : " & My.Computer.Info.OSVersion & vbNewLine &
"Platform : " & My.Computer.Info.OSPlatform & vbNewLine)